[@login]
;#IF
;checkGamepoint > 99
;#ACT
;addnamelist pointupdate.txt
;sendmsg 6 "Please contact mental to have your gamegold converted to gamegold"

;; admin logon

#IF
	ISADMIN
#ACT
	setRankLevelName %s\~Owner!~
	CHANGEMODE 2 1
	CHANGEMODE 3 1
;	sendmsg 6 "[!]Hello <$USERNAME>, admin mode enabled!"

;; check item return


; Ranks login
#IF
	checknamelist Ranks/newbie.txt
#ACT
	setRankLevelName %s\Newbie
#IF
	checknamelist Ranks/god.txt
#ACT
	setRankLevelName %s\GOD
#IF
	checknamelist Ranks/immortal.txt
#ACT
	setRankLevelName %s\ImmortaL
#IF
	checknamelist Ranks/wizard.txt
#ACT
	setRankLevelName %s\Wizard
#IF
	checknamelist Ranks/taoist.txt
#ACT
	setRankLevelName %s\Taoist
#IF
	checknamelist Ranks/warrior.txt
#ACT
	setRankLevelName %s\Warrior


#IF
	ISNEWHUMAN
#ACT
	setRankLevelName %s\~Newbie!~

; end Ranks



; LEVEL 50 Quest Vars
#IF
checknamelist ../market_def/Level50Quest/Variables/challange1.1.txt
#ACT
Var Integer Human Jie1
LoadVar Human Jie1 ../market_def/Level50Quest/Variables/Integral1.txt


; MultiKill Vars
#IF
checknamelist ../market_def/MultiKill/Variables/1.txt
#ACT
Var Integer Human MultiKill1
LoadVar Human MultiKill1 ../market_def/MultiKill/Variables/Integral.txt

#IF
checknamelist ../market_def/MultiKill/Variables/3.txt
#ACT
Var Integer Human MultiKill2
LoadVar Human MultiKill1 ../market_def/MultiKill/Variables/Integral.txt

#IF
checknamelist ../market_def/MultiKill/Variables/5.txt
#ACT
Var Integer Human MultiKill3
LoadVar Human MultiKill3 ../market_def/MultiKill/Variables/Integral.txt

; KillCount Vars

#IF
checknamelist ../market_def/KillCount/Variables/enabled.txt
#ACT
Var Integer Human KillCount1
LoadVar Human MultiKill3 ../market_def/KillCount/Variables/Integral.txt


;;;; ---------------------------------------mayhem -- begin
;#IF
;ISNEWHUMAN
;#ACT
;goto @marchmayhem
;;; ---------------------------------------mayhem -- end

;; save pets
;#IF
;checknamelist ../defines/JinchonCaptain.txt
;#ACT
;RECALLMOB JinchonCaptain 1
;delnamelist ../defines/JinchonCaptain.txt

;#IF
;checknamelist ../defines/DarkDevil.txt
;#ACT
;RECALLMOB DarkDevil 1
;delnamelist ../defines/DarkDevil.txt


;#IF
;checknamelist ../defines/MinoTaurKing.txt
;#ACT
;RECALLMOB MinoTaurKing 1
;delnamelist ../defines/MinoTaurKing.txt;

;#IF
;checknamelist ../defines/WoomaTaurus.txt
;#ACT
;RECALLMOB WoomaTaurus 1
;delnamelist ../defines/WoomaTaurus.txt

;#IF
;checknamelist ../defines/WhiteEvilBoar.txt
;#ACT
;RECALLMOB WhiteEvilBoar 1
;delnamelist ../defines/WhiteEvilBoar.txt

;#IF
;checknamelist ../defines/EvilSnake.txt
;#ACT
;RECALLMOB EvilSnake 1
;delnamelist ../defines/EvilSnake.txt

#IF
checknamelist ../defines/BoneLord.txt
#ACT
RECALLMOB BoneLord 1
delnamelist ../defines/BoneLord.txt

#IF
checknamelist ../defines/Khazard.txt
#ACT
RECALLMOB Khazard 1
delnamelist ../defines/Khazard.txt

#IF
checknamelist ../defines/KingScorpion.txt
#ACT
RECALLMOB KingScorpion 1
delnamelist ../defines/KingScorpion.txt

#IF
checknamelist ../defines/KingHog.txt
#ACT
RECALLMOB KingHog 1
delnamelist ../defines/KingHog.txt

#IF
checknamelist ../defines/RedThunderZuma.txt
#ACT
RECALLMOB RedThunderZuma 1
delnamelist ../defines/RedThunderZuma.txt

#IF
checknamelist ../defines/PossedGuardian.txt
#ACT
RECALLMOB PossedGuardian 1
delnamelist ../defines/PossedGuardian.txt

#IF
checknamelist ../defines/WoomaGuardian.txt
#ACT
RECALLMOB WoomaGuardian 1
delnamelist ../defines/WoomaGuardian.txt


;; gamepoint notification
#IF
checknamelist ../Npc_def/Lists/5.txt
#ACT
sendmsg 5 "You have 5 pounds worth of gamegold waiting to be collected!"

#IF
checknamelist ../Npc_def/Lists/10.txt
#ACT
sendmsg 5 "You have 10 pounds worth of gamegold waiting to be collected!"

#IF
checknamelist ../Npc_def/Lists/15.txt
#ACT
sendmsg 5 "You have 15 pounds worth of gamegold waiting to be collected!"

#IF
checknamelist ../Npc_def/Lists/20.txt
#ACT
sendmsg 5 "You have 20 pounds worth of gamegold waiting to be collected!"

#IF
checknamelist ../Npc_def/Lists/25.txt
#ACT
sendmsg 5 "You have 25 pounds worth of gamegold waiting to be collected!"

#IF
checknamelist ../Npc_def/Lists/30.txt
#ACT
sendmsg 5 "You have 30 pounds worth of gamegold waiting to be collected!"

#IF
checknamelist ../Npc_def/Lists/35.txt
#ACT
sendmsg 5 "You have 35 pounds worth of gamegold waiting to be collected!"

#IF
checknamelist ../Npc_def/Lists/40.txt
#ACT
sendmsg 5 "You have 40 pounds worth of gamegold waiting to be collected!"

#IF
checknamelist ../Npc_def/Lists/45.txt
#ACT
sendmsg 5 "You have 45 pounds worth of gamegold waiting to be collected!"

#IF
checknamelist ../Npc_def/Lists/50.txt
#ACT
sendmsg 5 "You have 50 pounds worth of gamegold waiting to be collected!"

#IF
checknamelist ../Npc_def/Lists/bonelord.txt
#ACT
sendmsg 5 "You have BoneLord compensation points waiting to be collected!"

#IF
checknamelist ../Npc_def/Lists/half.txt
#ACT
sendmsg 5 "You have 50 gamegold waiting to be collected!"

;; castle leader online

#IF
	ISCASTLEMASTER
#ACT
	sendmsg 1 "Castle leader <$USERNAME> is online"


;; 
;; rules set

#IF
checknamelist rules.txt
#ACT
goto @welcome
break

#ELSEACT
goto @staterules

[@staterules]
#ACT
addnamelist rules.txt
RECALLMOB Oma 1
RECALLMOB Oma 1
goto @sayrules

[@sayrules]
Welcome to RaGEZONE <$USERNAME>, we have provided you with\
two OMA's for assistance, if you logoff they will die, also\
i advise you to collect 5 meat and then visit Bichon Province\
and find the Low Level Cave. Lots of new features are within\
the game which you may not know about, so i advise you to explore,\
and remember to have fun and always be polite.\
\
PS : Server is running on public donations, donations = welcome!
                                                                                                                                                                             
[@welcome]
;#IF
;checknamelist taostone.txt
;#ACT
;goto @taohasstone
;break

;#IF
;checkjob taoist
;checklevel 20 
;#ACT
;give TaoStone(S) 1
;addnamelist taostone.txt
;goto @givetaostone
;break

#IF
checklevelex < 14
#ACT
recallmob Oma
recallmob Oma
goto @level2online
break

#IF
checklevelex = 15
#ACT
recallmob WoomaWarrior
goto @level15online
break

#IF
checklevelex = 16
#ACT
recallmob WoomaWarrior
goto @helper
break

#IF
checklevelex = 17
#ACT
recallmob WoomaWarrior
goto @helper
break

#IF
checklevelex = 18
#ACT
recallmob WoomaWarrior
goto @helper
break

#IF
checklevelex = 19
#ACT
recallmob WoomaWarrior
goto @helper
break

#IF
checklevelex = 20
#ACT
recallmob WoomaWarrior
goto @helper
break

#IF
checklevelex = 21
#ACT
recallmob WoomaWarrior
goto @helper
break

;; Level 45 menu
#IF
checklevelex = 45
#ACT
CHANGENAMECOLOR 231
goto @level45menu
break

#IF
checklevelex = 46
#ACT
CHANGENAMECOLOR 231
goto @level45menu
break

#IF
checklevelex = 47
#ACT
CHANGENAMECOLOR 231
goto @level45menu
break

#IF
checklevelex = 48
#ACT
CHANGENAMECOLOR 231
goto @level45menu
break

#IF
checklevelex = 49
#ACT
CHANGENAMECOLOR 231
goto @level45menu
break

#IF
checklevelex > 200
#ACT
goto @gmmenu
break

#ELSEACT
goto @welcome1

[@level2online]
Hello <$USERNAME> Sadly i noticed your still at low level so i\
have taken the liberty of producing you two more pets for your\
leveling assistance, so good luck!\
<exit/@exit>

[@welcome1]
#IF
checknamelist newrulesno.txt
#ACT
goto @interx
BREAK
#IF
checknamelist newrulesyes.txt
#ACT
goto @interx
BREAK
#IF
checknamelist rules.txt
#ACT
goto @newrules
#ELSEACT
goto @interx

[@newrules]
<Server rules!>\  \
You may not use such tactical plays as grief play on players\
You may not impersonate a player or staff member\
You may not insult any players or staff members unprovoked\
NEVER use any racial or sexual or gender slurs against players\
Be polite at all times and do not advertise any other server\
<Continue!/@page2ofrules>\


[@level15online]
Hi, i noticed your woomawarrior has died, so i have given it\
back, but take care, for me to give you a pet is like for a \
pokemon master giving away his pokemon!\
<exit/@exit>

[@helper]
Hi, due to the recent complaints, all those under 21 have been\
given a free pet! enjoy!\
<exit/@exit>

[@givetaostone]
Hi, here is a TaoStone(S) , enjoy\
<exit/@exit>

[@taohasstone]
#ACT
break

[@page2ofrules]
<What is Grief play?>\  \
Grief play is a term used in online gaming in which a players \
game play is effected by a singular or group of players with the\
intensions to cause the game to become virtually unplayable for \
the person effected, this can include;\
Recall PK-ing , Targeted abuse , BOSS stealing on a constant bases ... \
<Do you agree to these terms?> <YES/@newrulesyes> | <NO/@newrulesno>

[@newrulesyes]
#ACT
addnamelist newrulesyes.txt
#SAY
Thank you.

[@newrulesno]
#ACT
addnamelist newrulesno.txt
#SAY
Your account is now subject for termination due to the lack of\
comply to the rules.

[@interx]
#IF
checknamelist disablehat.txt
#ACT
goto @void
break

#ELSEACT
goto @interx1

[@interx1]
<Evolution patch is now out!>\  \
If your using the new optimized data files, would you like to set\
your new hair style? Im sure you would.\
<Yes please/@checkhair> -- <No Thanks/@exit> -- <Disable this/@evodisable>\

[@checkhair]
#IF
gender man
#ACT
goto @man

#ELSEACT
goto @woman

[@man]
<All styles are now free, what would you like?>\   \
<Bald/@man10> -- <Hair/@man2> -- <BronnzeHelm/@man3> -- <ChinaHat/@man4>\
<exit/@exit>

[@woman]
<All styles are now free, what would you like?>\   \
<Long blue/@woman10> -- <Long Red/@woman2> -- <Short Red/@woman3> -- <ChinaHat/@woman4>\
<exit/@exit>

[@man10]
#act
HAIRSTYLE 0
close

[@man2]
#act
HAIRSTYLE 1
close

[@man3]
#act
HAIRSTYLE 2
close

[@man4]
#act
HAIRSTYLE 3
close

[@woman10]
#act
HAIRSTYLE 0
close

[@woman2]
#act
HAIRSTYLE 1
close

[@woman3]
#act
HAIRSTYLE 2
close

[@woman4]
#act
HAIRSTYLE 3
close

[@1interx]
#ACT
break

[@evodisable]
Are you sure?\
<yes/@evodisable1>   <no/@exit>

[@evodisable1]
#ACT
addnamelist disablehat.txt
CLOSE


;; Level 45 + Login menu

[@level45menu]
<Level 45+ Menu accessed!> - select a feature\   \
<Rank's/@ranks> - Have your own title, stylish!\  \
<under construction!!!!>  <exit/@exit>

; black name
[@black]
#ACT
CHANGENAMECOLOR 0
goto @level45menu


	; ranks

[@ranks]
<Please choose a rank you wish to use!>\  \
<*FREE*/@rankfree> - For the people who are cheap\
<Newbie/@rank1> - 50,000 Gold\
<GOD/@rank2> - 100,000 Gold\
<ImmortaL/@rank3> - 200,000 Gold\
<main/@level45menu> | <Clear Rank/@rankdelete> | <exit/@exit>

[@rankfree]
<Please choose a free rank you wish to use!>\  \
<Wizard/@rank1free> - <Taoist/@rank2free> - <Warrior/@rank3free>\  \
<exit/@exit>

[@rankdelete]
#ACT
sendmsg 5 "Relog to take effect"
delnamelist Ranks/god.txt
delnamelist Ranks/immortal.txt
delnamelist Ranks/newbie.txt
delnamelist Ranks/wizard.txt
delnamelist Ranks/taoist.txt
delnamelist Ranks/warrior.txt
goto @ranks

;free

[@rank1free]
#ACT
delnamelist Ranks/god.txt
delnamelist Ranks/immortal.txt
delnamelist Ranks/newbie.txt
delnamelist Ranks/wizard.txt
delnamelist Ranks/taoist.txt
delnamelist Ranks/warrior.txt
addnamelist Ranks/wizard.txt
setRankLevelName %s\Wizard
sendmsg 5 "Wizard rank asigned"
goto @ranks

[@rank2free]
#ACT
delnamelist Ranks/god.txt
delnamelist Ranks/immortal.txt
delnamelist Ranks/newbie.txt
delnamelist Ranks/wizard.txt
delnamelist Ranks/taoist.txt
delnamelist Ranks/warrior.txt
addnamelist Ranks/taoist.txt
setRankLevelName %s\Taoist
sendmsg 5 "Taoist rank asigned"
goto @ranks

[@rank3free]
#ACT
delnamelist Ranks/god.txt
delnamelist Ranks/immortal.txt
delnamelist Ranks/newbie.txt
delnamelist Ranks/wizard.txt
delnamelist Ranks/taoist.txt
delnamelist Ranks/warrior.txt
addnamelist Ranks/warrior.txt
setRankLevelName %s\Warrior
sendmsg 5 "Warrior rank asigned"
goto @ranks

; newbie
[@rank1]
#IF
checkgold 50000
#ACT
take gold 50000
delnamelist Ranks/god.txt
delnamelist Ranks/immortal.txt
addnamelist Ranks/newbie.txt
setRankLevelName %s\Newbie
sendmsg 5 "Newbie rank asigned"
goto @ranks

#ELSEACT
goto @ranknogold

; GOD
[@rank2]
#IF
checkgold 100000
#ACT
take gold 100000
delnamelist Ranks/immortal.txt
delnamelist Ranks/newbie.txt
addnamelist Ranks/god.txt
setRankLevelName %s\GOD
sendmsg 5 "GOD rank asigned"
goto @ranks

#ELSEACT
goto @ranknogold

; Immortal
[@rank3]
#IF
checkgold 200000
#ACT
take gold 200000
delnamelist Ranks/god.txt
delnamelist Ranks/newbie.txt
addnamelist Ranks/immortal.txt
setRankLevelName %s\ImmortaL
sendmsg 5 "Immortal rank asigned"
goto @ranks

#ELSEACT
goto @ranknogold




[@ranknogold]
<Rank problem>\   \
Sorry but you lack gold :(\
</exit>



;; GM MENU
[@gmmenu]
MentaL testing menu, dont fuck around!\  \
<exp rate test/@gmmenu1>\
<power rate test/@gmmenu2>\
<Revirth test/@gmmenu3>\
<exit/@exit>

[@gmmenu1]
#ACT
KILLMONEXPRATE 300 14400
goto @gmmenu

[@gmmenu2]
#ACT
POWERRATE 150 3600
goto @gmmenu

[@gmmenu3]
#ACT
RENEWLEVEL 1 100 2

;; --- March Mayhem

[@marchmayhem]
#IF
    checkjob warrior
#ACT
    goto @warrioritemsMAYHEM
    break
#IF
    checkjob wizard
#ACT
    goto @wizarditemsMAYHEM
    break
#IF  
    checkjob taoist
#ACT
    goto @taoistitemsMAYHEM
    break

[@warrioritemsMAYHEM]
#IF
gender man
#ACT
mapmove 0 330 308
give PowerAxe 1
give copperring 2
give largebracelet 2
give blacknecklace 1
give magichelmet 1
give dcstone(S) 1
give chainbelt 1
give leatherboots 1
give HeavyArmour(M) 1
give warriorskull 1
give impactdrug 1
give skeletonring 2
give skeletonhelmet 1
give pickaxe 1
give townteleport 1
addskill fencing 2
addskill slaying 1
setRankLevelName %s\JustStarted!!!
give meat 5
;goto @randommayhemmob
SENDMSG 5 "Enjoy the event!"
CLOSE
#ELSEACT
mapmove 0 330 308
give PowerAxe 1
give copperring 2
give largebracelet 2
give blacknecklace 1
give magichelmet 1
give dcstone(S) 1
give chainbelt 1
give leatherboots 1
give HeavyArmour(F) 1
give warriorskull 1
give impactdrug 1
give skeletonring 2
give skeletonhelmet 1
give pickaxe 1
give townteleport 1
addskill fencing 2
addskill slaying 1
setRankLevelName %s\JustStarted!!!
give meat 5
;goto @randommayhemmob
SENDMSG 5 "Enjoy the event"vel there until 21."
CLOSE


[@wizarditemsMAYHEM]
#IF
gender man
#ACT
mapmove 0 330 308
give HookedSpear 1
give ebonynecklace 1
give hexagonalring 2
give steelbracelet 2
give magichelmet 1
give mcstone(S) 1
give chainbelt 1
give leatherboots 1
give MagicRobe(M) 1
give magicdrug 1
give wizardskull 1
give pickaxe 1
give townteleport 1
addskill fireball 3
setRankLevelName %s\JustStarted!!!
give meat 5
addskill repulsion 2
addskill eshock 1
addskill greatfireball 1
;goto @randommayhemmob
SENDMSG 5 "Enjoy the event"vel there until 21."
CLOSE
#ELSEACT
mapmove 0 330 308
give HookedSpear 1
give ebonynecklace 1
give hexagonalring 2
give steelbracelet 2
give magichelmet 1
give mcstone(S) 1
give chainbelt 1
give leatherboots 1
give meat 5
give MagicRobe(F) 1
give magicdrug 1
give wizardskull 1
give pickaxe 1
give townteleport 1
addskill fireball 3
addskill repulsion 2
addskill eshock 1
addskill greatfireball 1
setRankLevelName %s\JustStarted!!!
;goto @randommayhemmob
SENDMSG 5 "Enjoy the event"vel there until 21."
CLOSE

[@taoistitemsMAYHEM]
#IF
gender man
#ACT
mapmove 0 330 308
give KrissSword 1
give yellownecklace 1
give glassring 2
give steelbracelet 2
give magichelmet 1
give taostone(S)
give meat 5
give chainbelt 1
give leatherboots 1
give SoulArmour(M) 1
give souldrug 1
give taoistskull 1
give pickaxe 1
give townteleport 1
addskill healing 3
addskill spiritsword 3
addskill poisoning 2
setRankLevelName %s\JustStarted!!!
;goto @randommayhemmob
SENDMSG 5 "Enjoy the event"vel there until 21."
CLOSE
#ELSEACT
mapmove 0 330 308
give KrissSword 1
give yellownecklace 1
give glassring 2
give steelbracelet 2
give magichelmet 1
give taostone(S)
give chainbelt 1
give leatherboots 1
give SoulArmour(F) 1
give meat 5
give souldrug 1
give taoistskull 1
give pickaxe 1
give townteleport 1
addskill healing 3
addskill spiritsword 3
addskill poisoning 2
setRankLevelName %s\JustStarted!!!
;goto @randommayhemmob
SENDMSG 5 "Enjoy the event"vel there until 21."
CLOSE


[@randommayhemmob]
#IF
random 5
#ACT
recallmob Kimo
break

#IF
random 5
#ACT
recallmob Fox1
break

#if 
random 5
#ACT
recallmob SoldierAnt
break

#if
random 5
#ACT
recallmob BabyYimoogi
break

#IF
random 5
#ACT
recallmob BoneCaptain
break

#ELSEACT
goto @randommayhemmob

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Returning items

[@returnlogon]
#IF
CHECKNAMELISTPOSITION ReturnItem\name.txt 1
#ACT
sendmsg 6 "Worked!!!"
#ELSEACT
sendmsg 6 "Did not work!"